home *** CD-ROM | disk | FTP | other *** search
/ Hardcore Gamer Resource Kit / Hardcore Gamer Resource Kit - Disc 2.iso / Pc / A_C / AVFIX1.ZIP / install.cmd < prev    next >
OS/2 REXX Batch file  |  1997-01-03  |  2KB  |  79 lines
  1. /* Recreate objects script.
  2.  * 
  3.  * Generated via Object Desktop Package File 'avpkg.opg'.
  4.  */
  5.  
  6. /* Register with REXX API extensions. */
  7. Call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'
  8. Call SysLoadFuncs
  9.  
  10.  
  11. /* Get Installation Path */
  12. Say "-----------Avarice: The Final Saga---------------"
  13. Say "Fixkit #1: Please Read the README.TXT first!"
  14. Say "Please enter in the path to Avarice: The Final Saga"
  15. Say "Example C:\AVARICE"
  16. Parse Upper Pull instpath
  17.  
  18. /* Get creation disposition. */
  19. Say 'When object exists object creation should:' 
  20. Call CharOut, '  (U=Update, R=Replace, F=Fail) : '
  21. Parse Upper Pull Answer
  22. CreateCollision = 'Fail'
  23. If Left( Answer, 1 ) = R Then CreateCollision = 'Replace' 
  24. If Left( Answer, 1 ) = U Then CreateCollision = 'Update' 
  25.  
  26. Call CreateObjects
  27. Exit
  28.  
  29. CreateObject: procedure
  30.     Parse Arg Class, Title, Location, Setup, Collision
  31.     Say 'Creating ['Title']'
  32.     rc = SysCreateObject( Class, Title, Location, Setup, Collision )
  33.     If rc <> 1 Then
  34.         Say ' > failed to create ['Title' | 'Class'] at location ['Location']'
  35.     return rc
  36.  
  37. CreateObjects:
  38.  
  39. rc = CreateObject( 'WPFolder',,
  40.     'Avarice: The Final Saga',,
  41.     '<WP_DESKTOP>',,
  42.     'NOPRINT=YES;'||,
  43.         'DEFAULTVIEW=CONTENTS;'||,
  44.         'HELPPANEL=15685;'||,
  45.         'ICONPOS=18,24;'||,
  46.         'SELFCLOSE=1;'||,
  47.         'ICONFONT=9.WarpSans;'||,
  48.         'DETAILSFONT=9.WarpSans;'||,
  49.         'TREEFONT=9.WarpSans;'||,
  50.         'ICONVIEW=NONGRID,NORMAL;'||,
  51.         'DETAILSVIEW=MINI;'||,
  52.         'TREEVIEW=LINES,MINI;'||,
  53.         'OBJECTID=<Avarice__The_Final_Saga>',,
  54.     CreateCollision )
  55.  
  56.   rc = CreateObject( 'WPProgram',,
  57.       'Avarice',,
  58.       '<Avarice__The_Final_Saga>',,
  59.       'NOTDEFAULTICON=YES;'||,
  60.           'NOPRINT=YES;'||,
  61.           'DEFAULTVIEW=RUNNING;'||,
  62.           'EXENAME='instpath'\avarice.exe;'||,
  63.           'ICONFILE='instpath'\Avarice.ICO',,
  64.       CreateCollision )
  65.  
  66.   rc = CreateObject( 'WPProgram',,
  67.       'Avarice: Compatibility Mode',,
  68.       '<Avarice__The_Final_Saga>',,
  69.       'NOTDEFAULTICON=YES;'||,
  70.           'NOPRINT=YES;'||,
  71.           'DEFAULTVIEW=RUNNING;'||,
  72.           'EXENAME='instpath'\AVARICE.EXE;'||,
  73.           'PARAMETERS=23 >error.txt;'||,
  74.           'ICONFILE='instpath'\av2.ico',,
  75.       CreateCollision )
  76.  
  77. return
  78.  
  79.